home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 October / Ahoy_Magazine_87-10_1987_Double_L_Side_A.d64 / Internal Del 1 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  400b  |  16 lines
  1. 0 poke 53280,0:poke 53281,0
  2. 1 rem ==================================
  3. 2 rem    commodares problem #42-1 :
  4. 3 rem     internal deletion
  5. 4 rem    solution by
  6. 5 rem     tim gaastra
  7. 6 rem =========  c-64 version ==========
  8. 7 rem - for c-128, replace 631, 638, 198
  9. 8 rem      in line 30 with 842, 849, 208
  10. 9 rem
  11. 10 print 10
  12. 20 print 20
  13. 30 for a=631 to 638:read b:poke a,b:next:poke 198,8
  14. 35 data 50,48,13,82,117,52,48,13:stop
  15. 40 list
  16.